home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / COMMUNIC / H366.ZIP / PLAYNOTE.SC_ / PLAYNOTE.SC
Text File  |  1993-04-22  |  98b  |  8 lines
  1. ; Play musical notes
  2. i=10
  3. while (i < 60)
  4.   soundplaynote(i,16,1)
  5.   i = i + 5
  6. endwhile
  7. exit
  8.